current version 1.0 - 25th Mar 2019
| version | date | comment |
|---|---|---|
| 1.0 | 25/Mar/2019 | Original code |
license: GNU GPL http://www.gnu.org/licenses/
Compute canopy interception. The method implemented in this module is according to SWAT model (canopy storage)
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| type(grid_real), | public | :: | canopyPT |
transpiration from canopy (m/s) |
|||
| type(grid_real), | public | :: | canopyStorage |
water canopy storage (mm) |
|||
| type(grid_real), | public | :: | canopymax |
maximum canopy storage capacity (m) |
|||
| integer(kind=short), | public | :: | dtCanopyInterception | ||||
| integer(kind=short), | public | :: | interceptionParametersByMap | = | 1 |
set if parameters are load from map (1) or set according to plant species properties (0) |
|
| type(grid_real), | public | :: | laimax |
maximum leaf area index value (m2/m2) |
Subroutine to adjust the actual evaporation to the intercepted rainfall. The amount of water intercepted by the canopy is going to contribute to the evaporation rate. When calculating the evaporation within a forest, the model tends to remove as much as possible from the water intercepted by the canopy. This step will be carried out before the adjustement of the evapotranspiration to soil moisture.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(grid_real), | intent(in) | :: | fv |
fraction of vegetation covering the cell |
||
| type(grid_integer), | intent(in) | :: | domain |
analysis domain |
||
| type(grid_real), | intent(inout) | :: | pt |
potential transpiration from soil [m/s] |
||
| integer(kind=short), | intent(in) | :: | dtpet |
dt of evapotranspiration computation |
initialize variables for computing rainfall interception
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | filename |
configuration file name |
||
| type(grid_integer), | intent(in) | :: | domain |
analysis domain |
calculate the effective rainfall through canopy
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(grid_real), | intent(in) | :: | rain |
rainfall rate (m/s) |
||
| type(grid_real), | intent(in) | :: | lai |
leaf area index (m2/m2) |
||
| type(grid_integer), | intent(in) | :: | domain |
analysis domain |
||
| type(grid_real), | intent(in) | :: | fv |
fraction of vegetation covering the cell (0-1) |
||
| type(grid_real), | intent(inout) | :: | raineff |
effecttive rainfall rate (throughfall) (m/s) |